\(\int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx\) [1880]

Optimal result

Integrand size = 24, antiderivative size = 51 \[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\frac {(a+b x)^{1+m} \operatorname {Hypergeometric2F1}\left (1,1+m,2+m,-\frac {d (a+b x)}{b c-a d}\right )}{(b c-a d) (1+m)} \]

[Out]

(b*x+a)^(1+m)*hypergeom([1, 1+m],[2+m],-d*(b*x+a)/(-a*d+b*c))/(-a*d+b*c)/(1+m)

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 51, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.083, Rules used = {7, 70} \[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\frac {(a+b x)^{m+1} \operatorname {Hypergeometric2F1}\left (1,m+1,m+2,-\frac {d (a+b x)}{b c-a d}\right )}{(m+1) (b c-a d)} \]

[In]

Int[(a + b*x)^m*(c + d*x)^(1 + 2*n - 2*(1 + n)),x]

[Out]

((a + b*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, -((d*(a + b*x))/(b*c - a*d))])/((b*c - a*d)*(1 + m))

Rule 7

Int[(u_.)*(Px_)^(p_), x_Symbol] :> Int[u*Px^Simplify[p], x] /; PolyQ[Px, x] &&  !RationalQ[p] && FreeQ[p, x] &
& RationalQ[Simplify[p]]

Rule 70

Int[((a_) + (b_.)*(x_))^(m_)*((c_) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[(b*c - a*d)^n*((a + b*x)^(m + 1)/(b^(
n + 1)*(m + 1)))*Hypergeometric2F1[-n, m + 1, m + 2, (-d)*((a + b*x)/(b*c - a*d))], x] /; FreeQ[{a, b, c, d, m
}, x] && NeQ[b*c - a*d, 0] &&  !IntegerQ[m] && IntegerQ[n]

Rubi steps \begin{align*} \text {integral}& = \int \frac {(a+b x)^m}{c+d x} \, dx \\ & = \frac {(a+b x)^{1+m} \, _2F_1\left (1,1+m;2+m;-\frac {d (a+b x)}{b c-a d}\right )}{(b c-a d) (1+m)} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.01 (sec) , antiderivative size = 51, normalized size of antiderivative = 1.00 \[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=-\frac {(a+b x)^{1+m} \operatorname {Hypergeometric2F1}\left (1,1+m,2+m,\frac {d (a+b x)}{-b c+a d}\right )}{(-b c+a d) (1+m)} \]

[In]

Integrate[(a + b*x)^m*(c + d*x)^(1 + 2*n - 2*(1 + n)),x]

[Out]

-(((a + b*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, (d*(a + b*x))/(-(b*c) + a*d)])/((-(b*c) + a*d)*(1 + m)
))

Maple [F]

\[\int \frac {\left (b x +a \right )^{m}}{d x +c}d x\]

[In]

int((b*x+a)^m/(d*x+c),x)

[Out]

int((b*x+a)^m/(d*x+c),x)

Fricas [F]

\[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\int { \frac {{\left (b x + a\right )}^{m}}{d x + c} \,d x } \]

[In]

integrate((b*x+a)^m/(d*x+c),x, algorithm="fricas")

[Out]

integral((b*x + a)^m/(d*x + c), x)

Sympy [F]

\[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\int \frac {\left (a + b x\right )^{m}}{c + d x}\, dx \]

[In]

integrate((b*x+a)**m/(d*x+c),x)

[Out]

Integral((a + b*x)**m/(c + d*x), x)

Maxima [F]

\[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\int { \frac {{\left (b x + a\right )}^{m}}{d x + c} \,d x } \]

[In]

integrate((b*x+a)^m/(d*x+c),x, algorithm="maxima")

[Out]

integrate((b*x + a)^m/(d*x + c), x)

Giac [F]

\[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\int { \frac {{\left (b x + a\right )}^{m}}{d x + c} \,d x } \]

[In]

integrate((b*x+a)^m/(d*x+c),x, algorithm="giac")

[Out]

integrate((b*x + a)^m/(d*x + c), x)

Mupad [F(-1)]

Timed out. \[ \int (a+b x)^m (c+d x)^{1+2 n-2 (1+n)} \, dx=\int \frac {{\left (a+b\,x\right )}^m}{c+d\,x} \,d x \]

[In]

int((a + b*x)^m/(c + d*x),x)

[Out]

int((a + b*x)^m/(c + d*x), x)